home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: Mailbox/MIME Entity
(archive/mbox).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| Mailbox/MIME Entity (archive/mbox)
| magic
| Supported |
| 100%
| dexvert
| Internet Message Format (text/imf)
| magic
| Supported |
| 1%
| dexvert
| WANG Integrated Word Processor (document/wangIWP)
| ext
| Unsupported |
| 1%
| dexvert
| Dynamic Publisher Document (document/dynamicPublisherDocument)
| ext
| Unsupported |
| 1%
| dexvert
| Excellence! Document (document/excellenceDocument)
| ext
| Unsupported |
| 1%
| dexvert
| Norton Textra Writer (document/textraWriter)
| ext
| Unsupported |
| 1%
| dexvert
| IBM DisplayWrite Document (document/ibmDisplayWriteDocument)
| ext
| Unsupported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| Mailbox text, 1st line "From myrias!mj Thu Oct 20 15:44:19 EDT 1988"
| default
| |
| 99%
| file
| C source text
| default
| |
| 98%
| file
| C source, ASCII text, with CRLF line terminators
| default
| |
| 100%
| TrID
| E-Mail message (Var. 2)
| default
| |
| 100%
| checkBytes
| Printable ASCII
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| detectItEasy
| Format: plain text[CRLF]
| default (weak)
| |
| 100%
| xdgMime
| application/mbox
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 20 6d 79 72 | 69 61 73 21 6d 6a 20 54 |From myr|ias!mj T|
|00000010| 68 75 20 4f 63 74 20 32 | 30 20 31 35 3a 34 34 3a |hu Oct 2|0 15:44:|
|00000020| 31 39 20 45 44 54 20 31 | 39 38 38 0d 0a 58 2d 52 |19 EDT 1|988..X-R|
|00000030| 4e 2d 41 72 74 69 63 6c | 65 3a 20 31 32 31 32 35 |N-Articl|e: 12125|
|00000040| 20 6f 66 20 63 6f 6d 70 | 2e 73 79 73 2e 61 74 61 | of comp|.sys.ata|
|00000050| 72 69 2e 73 74 0d 0a 3e | 46 72 6f 6d 3a 20 6d 6a |ri.st..>|From: mj|
|00000060| 40 6d 79 72 69 61 73 2e | 55 55 43 50 20 28 4d 69 |@myrias.|UUCP (Mi|
|00000070| 63 68 61 6c 20 4a 61 65 | 67 65 72 6d 61 6e 6e 29 |chal Jae|germann)|
|00000080| 0d 0a 4e 65 77 73 67 72 | 6f 75 70 73 3a 20 63 6f |..Newsgr|oups: co|
|00000090| 6d 70 2e 73 79 73 2e 61 | 74 61 72 69 2e 73 74 0d |mp.sys.a|tari.st.|
|000000a0| 0a 53 75 62 6a 65 63 74 | 3a 20 43 61 6c 6c 69 6e |.Subject|: Callin|
|000000b0| 67 20 63 61 6c 6c 67 75 | 6c 61 6d 20 2d 20 65 78 |g callgu|lam - ex|
|000000c0| 70 6c 61 6e 61 74 69 6f | 6e 20 61 6e 64 20 65 78 |planatio|n and ex|
|000000d0| 61 6d 70 6c 65 0d 0a 4b | 65 79 77 6f 72 64 73 3a |ample..K|eywords:|
|000000e0| 20 67 75 6c 61 6d 2c 20 | 73 68 65 6c 6c 0d 0a 44 | gulam, |shell..D|
|000000f0| 61 74 65 3a 20 31 39 20 | 4f 63 74 20 38 38 20 32 |ate: 19 |Oct 88 2|
|00000100| 33 3a 34 37 3a 34 37 20 | 47 4d 54 0d 0a 4f 72 67 |3:47:47 |GMT..Org|
|00000110| 61 6e 69 7a 61 74 69 6f | 6e 3a 20 4d 79 72 69 61 |anizatio|n: Myria|
|00000120| 73 20 52 65 73 65 61 72 | 63 68 2c 20 45 64 6d 6f |s Resear|ch, Edmo|
|00000130| 6e 74 6f 6e 0d 0a 0d 0a | 28 57 68 61 74 65 76 65 |nton....|(Whateve|
|00000140| 72 20 69 73 20 64 65 73 | 63 72 69 62 65 64 20 62 |r is des|cribed b|
|00000150| 65 6c 6f 77 20 77 61 73 | 20 63 68 65 63 6b 65 64 |elow was| checked|
|00000160| 20 66 6f 72 20 61 20 67 | 75 6c 61 6d 20 76 65 72 | for a g|ulam ver|
|00000170| 73 69 6f 6e 0d 0a 77 68 | 69 63 68 20 69 64 65 6e |sion..wh|ich iden|
|00000180| 74 69 66 69 65 73 20 69 | 74 73 65 6c 66 20 61 73 |tifies i|tself as|
|00000190| 3a 0d 0a 0d 0a 09 62 65 | 74 61 20 74 65 73 74 20 |:.....be|ta test |
|000001a0| 76 65 72 73 69 6f 6e 20 | 31 2e 30 33 2e 30 34 2e |version |1.03.04.|
|000001b0| 30 35 20 31 32 31 38 38 | 37 20 6f 66 0d 0a 09 79 |05 12188|7 of...y|
|000001c0| 65 74 20 61 6e 6f 74 68 | 65 72 20 73 68 65 6c 6c |et anoth|er shell|
|000001d0| 20 66 6f 72 20 41 74 61 | 72 69 53 54 2f 54 4f 53 | for Ata|riST/TOS|
|000001e0| 0d 0a 0d 0a 59 6f 75 72 | 20 6d 69 6c 65 61 67 65 |....Your| mileage|
|000001f0| 20 6d 61 79 20 76 61 72 | 79 21 21 29 0d 0a 0d 0a | may var|y!!)....|
|00000200| 20 20 20 41 73 20 79 6f | 75 20 6d 61 79 20 6e 6f | As yo|u may no|
|00000210| 74 20 6b 6e 6f 77 2c 20 | 61 20 76 65 72 79 20 70 |t know, |a very p|
|00000220| 6f 70 75 6c 61 72 20 47 | 75 6c 61 6d 20 73 68 65 |opular G|ulam she|
|00000230| 6c 6c 20 28 6d 61 6e 79 | 20 74 68 61 6e 6b 73 20 |ll (many| thanks |
|00000240| 74 6f 0d 0a 50 72 61 62 | 68 61 6b 65 72 20 4d 61 |to..Prab|haker Ma|
|00000250| 74 65 74 69 20 61 6e 64 | 20 4a 77 61 68 61 72 20 |teti and| Jwahar |
|00000260| 52 2e 20 42 61 6d 6d 69 | 29 2e 20 69 6e 63 6c 75 |R. Bammi|). inclu|
|00000270| 64 65 73 20 71 75 69 74 | 65 20 70 6f 77 65 72 66 |des quit|e powerf|
|00000280| 75 6c 20 66 61 63 69 6c | 69 74 79 0d 0a 74 6f 20 |ul facil|ity..to |
|00000290| 69 6e 76 6f 6b 65 20 67 | 75 6c 61 6d 20 73 65 72 |invoke g|ulam ser|
|000002a0| 76 69 63 65 73 20 66 72 | 6f 6d 20 61 20 70 72 6f |vices fr|om a pro|
|000002b0| 67 72 61 6d 20 73 74 61 | 72 74 65 64 20 66 72 6f |gram sta|rted fro|
|000002c0| 6d 20 67 75 6c 61 6d 2e | 20 20 49 6e 20 63 6f 6e |m gulam.| In con|
|000002d0| 74 72 61 73 74 0d 0a 74 | 6f 20 6d 61 6e 79 20 6f |trast..t|o many o|
|000002e0| 74 68 65 72 73 20 73 68 | 65 6c 6c 73 20 66 6c 6f |thers sh|ells flo|
|000002f0| 61 74 69 6e 67 20 61 72 | 6f 75 6e 67 20 74 68 69 |ating ar|oung thi|
|00000300| 73 20 69 73 20 6e 6f 74 | 20 64 6f 6e 65 20 62 79 |s is not| done by|
|00000310| 20 65 78 65 63 75 74 69 | 6e 67 0d 0a 74 68 65 20 | executi|ng..the |
|00000320| 6e 65 78 74 20 69 6e 63 | 61 72 6e 61 74 69 6f 6e |next inc|arnation|
|00000330| 20 6f 66 20 67 75 6c 61 | 6d 2e 20 49 6e 73 74 65 | of gula|m. Inste|
|00000340| 61 64 20 74 68 65 72 65 | 20 61 72 65 20 70 72 6f |ad there| are pro|
|00000350| 76 69 64 65 64 20 74 77 | 6f 20 70 6f 69 6e 74 65 |vided tw|o pointe|
|00000360| 72 73 0d 0a 77 68 69 63 | 68 20 70 72 6f 76 69 64 |rs..whic|h provid|
|00000370| 65 20 65 78 65 63 75 74 | 69 6f 6e 20 27 68 6f 6f |e execut|ion 'hoo|
|00000380| 6b 73 27 20 66 6f 72 20 | 61 6c 6c 20 67 75 6c 61 |ks' for |all gula|
|00000390| 6d 20 63 6f 6d 6d 61 6e | 64 73 2e 20 20 41 20 62 |m comman|ds. A b|
|000003a0| 72 69 67 68 74 20 73 69 | 67 68 74 0d 0a 69 73 20 |right si|ght..is |
|000003b0| 74 68 61 74 20 74 68 69 | 73 20 61 70 70 72 6f 61 |that thi|s approa|
|000003c0| 63 68 20 64 6f 65 73 20 | 6e 6f 74 20 74 61 6b 65 |ch does |not take|
|000003d0| 20 61 6e 79 20 65 78 74 | 72 61 20 6d 65 6d 6f 72 | any ext|ra memor|
|000003e0| 79 20 61 6e 64 20 61 20 | 73 74 61 72 74 2d 75 70 |y and a |start-up|
|000003f0| 0d 0a 74 69 6d 65 20 69 | 73 20 6e 65 67 6c 69 67 |..time i|s neglig|
|00000400| 69 62 6c 65 2e 20 41 20 | 64 61 72 6b 20 73 69 64 |ible. A |dark sid|
|00000410| 65 20 69 73 20 74 68 61 | 74 20 64 6f 63 75 6d 65 |e is tha|t docume|
|00000420| 6e 74 61 74 69 6f 6e 20 | 64 65 73 63 72 69 62 69 |ntation |describi|
|00000430| 6e 67 20 74 68 69 73 0d | 0a 66 61 63 69 6c 69 74 |ng this.|.facilit|
|00000440| 79 20 69 73 20 65 69 74 | 68 65 72 20 6d 69 73 6c |y is eit|her misl|
|00000450| 65 61 64 69 6e 67 20 6f | 72 20 70 6c 61 69 6e 6c |eading o|r plainl|
|00000460| 79 20 77 72 6f 6e 67 2e | 20 20 28 41 73 20 61 6e |y wrong.| (As an|
|00000470| 20 61 73 69 64 65 20 2d | 20 74 68 69 73 0d 0a 69 | aside -| this..i|
|00000480| 73 2c 20 61 6c 61 73 2c | 20 6e 6f 74 20 74 68 65 |s, alas,| not the|
|00000490| 20 6f 6e 6c 79 20 70 6c | 61 63 65 20 69 6e 20 64 | only pl|ace in d|
|000004a0| 6f 63 75 6d 65 6e 74 61 | 74 69 6f 6e 20 72 65 71 |ocumenta|tion req|
|000004b0| 75 69 72 69 6e 67 20 74 | 6f 75 63 68 2d 75 70 2e |uiring t|ouch-up.|
|000004c0| 0d 0a 46 6f 72 20 74 68 | 69 73 20 76 65 72 73 69 |..For th|is versi|
|000004d0| 6f 6e 2c 20 67 75 6c 61 | 6d 2e 68 6c 70 2c 20 66 |on, gula|m.hlp, f|
|000004e0| 6f 72 20 65 78 61 6d 70 | 6c 65 2c 20 64 6f 65 73 |or examp|le, does|
|000004f0| 20 6e 6f 74 20 63 6f 72 | 72 65 73 70 6f 6e 64 20 | not cor|respond |
|00000500| 76 65 72 79 20 77 65 6c | 6c 0d 0a 74 70 20 72 65 |very wel|l..tp re|
|00000510| 61 6c 69 74 79 29 2e 0d | 0a 0d 0a 20 20 20 54 68 |ality)..|... Th|
|00000520| 69 73 20 6e 6f 74 65 20 | 69 73 20 61 20 6b 69 6e |is note |is a kin|
|00000530| 64 20 6f 66 20 65 72 72 | 61 74 75 6d 2c 20 77 68 |d of err|atum, wh|
|00000540| 69 63 68 2c 20 68 6f 70 | 65 66 75 6c 79 2c 20 77 |ich, hop|efuly, w|
|00000550| 69 6c 6c 20 68 65 6c 70 | 20 74 6f 20 63 6c 61 72 |ill help| to clar|
|00000560| 69 66 79 0d 0a 61 6e 20 | 65 6e 73 75 69 6e 67 20 |ify..an |ensuing |
|00000570| 63 6f 6e 66 75 73 69 6f | 6e 2c 20 77 68 69 63 68 |confusio|n, which|
|00000580| 20 73 65 65 6d 73 20 74 | 6f 20 62 65 20 71 75 69 | seems t|o be qui|
|00000590| 74 65 20 77 69 64 65 73 | 70 72 65 61 64 2e 0d 0a |te wides|pread...|
|000005a0| 0d 0a 20 20 20 57 68 65 | 6e 20 79 6f 75 20 61 72 |.. Whe|n you ar|
|000005b0| 65 20 72 75 6e 6e 69 6e | 67 20 47 75 6c 61 6d 20 |e runnin|g Gulam |
|000005c0| 61 20 54 4f 53 20 76 61 | 72 69 61 62 6c 65 20 27 |a TOS va|riable '|
|000005d0| 5f 73 68 65 6c 6c 5f 70 | 27 2c 20 61 74 20 30 78 |_shell_p|', at 0x|
|000005e0| 34 66 36 2c 0d 0a 63 6f | 6e 74 61 69 6e 73 20 61 |4f6,..co|ntains a|
|000005f0| 6e 20 61 64 64 72 65 73 | 73 20 6f 66 20 61 20 6c |n addres|s of a l|
|00000600| 6f 63 61 74 69 6f 6e 20 | 6e 61 6d 65 64 20 27 74 |ocation |named 't|
|00000610| 6f 67 75 5f 27 2c 20 77 | 68 69 63 68 20 69 73 20 |ogu_', w|hich is |
|00000620| 74 68 65 20 6c 61 73 74 | 20 65 6e 74 72 79 0d 0a |the last| entry..|
|00000630| 69 6e 20 61 20 31 36 20 | 62 79 74 65 20 6c 6f 6e |in a 16 |byte lon|
|00000640| 67 20 74 61 62 6c 65 2e | 20 54 68 65 20 66 6f 72 |g table.| The for|
|00000650| 6d 61 74 20 6f 66 20 74 | 68 65 20 74 61 62 6c 65 |mat of t|he table|
|00000660| 20 69 73 20 28 74 68 69 | 73 20 69 73 20 6d 6f 73 | is (thi|s is mos|
|00000670| 74 6c 79 20 71 75 6f 74 | 65 64 0d 0a 66 72 6f 6d |tly quot|ed..from|
|00000680| 20 74 68 65 20 64 6f 63 | 75 6d 65 6e 74 61 74 69 | the doc|umentati|
|00000690| 6f 6e 29 3a 0d 0a 0d 0a | 20 20 20 20 20 20 20 20 |on):....| |
|000006a0| 20 20 20 20 20 20 20 2e | 6c 6f 6e 67 20 20 20 30 | .|long 0|
|000006b0| 78 38 36 34 32 30 31 33 | 35 20 20 20 20 20 20 20 |x8642013|5 |
|000006c0| 20 2f 20 6f 75 72 20 6d | 61 67 69 63 20 6e 75 6d | / our m|agic num|
|000006d0| 62 65 72 20 28 34 20 62 | 79 74 65 73 29 0d 0a 20 |ber (4 b|ytes).. |
|000006e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 6a 6d | | jm|
|000006f0| 70 20 20 20 20 20 67 65 | 74 6c 69 6e 65 76 69 61 |p ge|tlinevia|
|00000700| 75 65 5f 20 20 20 20 20 | 2f 20 30 78 34 65 66 39 |ue_ |/ 0x4ef9|
|00000710| 2c 61 64 64 72 65 73 73 | 20 20 20 28 36 20 62 79 |,address| (6 by|
|00000720| 74 65 73 29 0d 0a 20 20 | 20 20 20 20 20 74 6f 67 |tes).. | tog|
|00000730| 75 5f 3a 20 20 6a 6d 70 | 20 20 20 20 20 63 61 6c |u_: jmp| cal|
|00000740| 6c 67 75 6c 61 6d 5f 20 | 20 20 20 20 20 20 20 2f |lgulam_ | /|
|00000750| 20 30 78 34 65 66 39 2c | 61 64 64 72 65 73 73 20 | 0x4ef9,|address |
|00000760| 20 20 28 36 20 62 79 74 | 65 73 29 0d 0a 0d 0a 49 | (6 byt|es)....I|
|00000770| 74 20 63 6c 65 61 72 6c | 79 20 66 6f 6c 6c 6f 77 |t clearl|y follow|
|00000780| 73 20 66 72 6f 6d 20 74 | 68 61 74 20 74 68 61 74 |s from t|hat that|
|00000790| 20 6d 61 67 69 63 20 6e | 75 6d 62 65 72 20 69 73 | magic n|umber is|
|000007a0| 20 6c 6f 63 61 74 65 64 | 20 31 30 20 62 79 74 65 | located| 10 byte|
|000007b0| 73 20 62 65 66 6f 72 65 | 0d 0a 27 74 6f 67 75 5f |s before|..'togu_|
|000007c0| 27 20 61 6e 64 20 6e 6f | 74 2c 20 74 68 65 20 64 |' and no|t, the d|
|000007d0| 6f 63 75 6d 65 6e 74 61 | 74 69 6f 6e 20 73 75 67 |ocumenta|tion sug|
|000007e0| 67 65 73 74 65 64 2c 20 | 31 32 2e 20 20 57 68 61 |gested, |12. Wha|
|000007f0| 74 27 73 20 6d 6f 72 65 | 2c 20 74 68 65 20 6d 61 |t's more|, the ma|
|00000800| 67 69 63 20 0d 0a 6e 75 | 6d 62 65 72 20 73 68 6f |gic ..nu|mber sho|
|00000810| 75 6c 64 20 62 65 20 65 | 71 75 61 6c 20 2a 28 6c |uld be e|qual *(l|
|00000820| 6f 6e 67 20 2a 29 28 2a | 28 63 68 61 72 20 2a 2a |ong *)(*|(char **|
|00000830| 29 30 78 34 66 36 20 2d | 20 31 30 29 2c 20 69 6e |)0x4f6 -| 10), in|
|00000840| 73 74 65 61 64 20 6f 66 | 20 61 0d 0a 67 69 76 65 |stead of| a..give|
|00000850| 6e 20 2a 28 28 6c 6f 6e | 67 20 2a 29 30 78 34 36 |n *((lon|g *)0x46|
|00000860| 66 4c 20 2d 20 31 32 4c | 29 2c 20 77 68 69 63 68 |fL - 12L|), which|
|00000870| 20 77 69 6c 6c 20 70 72 | 6f 64 75 63 65 20 61 20 | will pr|oduce a |
|00000880| 76 61 6c 75 65 20 66 72 | 6f 6d 20 61 6e 20 61 64 |value fr|om an ad|
|00000890| 64 72 65 73 73 0d 0a 77 | 61 79 20 6f 66 66 2e 20 |dress..w|ay off. |
|000008a0| 20 4f 6e 20 74 68 65 20 | 74 6f 70 20 6f 66 20 69 | On the |top of i|
|000008b0| 74 2c 20 61 6e 20 61 63 | 74 75 61 6c 20 6d 61 67 |t, an ac|tual mag|
|000008c0| 69 63 20 6e 75 6d 62 65 | 72 20 69 6e 20 6d 79 20 |ic numbe|r in my |
|000008d0| 63 6f 70 79 20 6f 66 20 | 47 75 6c 61 6d 0d 0a 69 |copy of |Gulam..i|
|000008e0| 73 20 6e 6f 74 20 6c 69 | 6b 65 20 74 68 65 20 64 |s not li|ke the d|
|000008f0| 6f 63 75 6d 65 6e 74 65 | 64 20 62 75 74 20 69 74 |ocumente|d but it|
|00000900| 20 65 71 75 61 6c 73 20 | 30 78 30 30 34 32 30 31 | equals |0x004201|
|00000910| 33 35 2e 20 20 55 73 65 | 20 47 75 6c 61 6d 20 27 |35. Use| Gulam '|
|00000920| 70 65 65 6b 77 27 0d 0a | 74 6f 20 63 68 65 63 6b |peekw'..|to check|
|00000930| 20 77 68 61 74 20 79 6f | 75 20 67 6f 74 2e 20 54 | what yo|u got. T|
|00000940| 6f 20 62 65 20 6f 6e 20 | 61 20 73 61 66 65 20 73 |o be on |a safe s|
|00000950| 69 64 65 2c 20 75 6e 74 | 69 6c 20 74 68 65 20 6d |ide, unt|il the m|
|00000960| 61 74 74 65 72 0d 0a 69 | 73 20 66 75 6c 6c 79 20 |atter..i|s fully |
|00000970| 63 6c 61 72 69 66 69 65 | 64 2c 20 49 20 61 6d 20 |clarifie|d, I am |
|00000980| 75 73 69 6e 67 20 6f 6e | 6c 79 20 61 20 6c 6f 77 |using on|ly a low|
|00000990| 65 72 20 68 61 6c 66 20 | 6f 66 20 74 68 65 20 6d |er half |of the m|
|000009a0| 61 67 69 63 20 6e 75 6d | 62 65 72 2c 0d 0a 77 68 |agic num|ber,..wh|
|000009b0| 69 63 68 20 73 65 65 6d | 73 20 74 6f 20 62 65 20 |ich seem|s to be |
|000009c0| 63 6f 72 72 65 63 74 3b | 20 69 2e 65 2e 20 73 68 |correct;| i.e. sh|
|000009d0| 6f 72 74 5f 6d 61 67 69 | 63 20 3d 20 2a 28 73 68 |ort_magi|c = *(sh|
|000009e0| 6f 72 74 20 2a 29 28 2a | 28 63 68 61 72 20 2a 2a |ort *)(*|(char **|
|000009f0| 29 30 78 34 66 36 2d 38 | 29 2e 0d 0a 0d 0a 20 20 |)0x4f6-8|)..... |
|00000a00| 54 77 6f 20 6f 74 68 65 | 72 20 69 74 65 6d 73 20 |Two othe|r items |
|00000a10| 69 6e 20 74 68 65 20 74 | 61 62 6c 65 20 61 72 65 |in the t|able are|
|00000a20| 20 65 6e 74 72 79 20 70 | 6f 69 6e 74 73 20 74 6f | entry p|oints to|
|00000a30| 20 74 77 6f 20 66 75 6e | 63 74 69 6f 6e 73 0d 0a | two fun|ctions..|
|00000a40| 27 67 65 74 6c 69 6e 65 | 76 69 61 75 65 27 20 61 |'getline|viaue' a|
|00000a50| 6e 64 20 27 63 61 6c 6c | 67 75 6c 61 6d 27 2e 20 |nd 'call|gulam'. |
|00000a60| 20 54 68 65 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e | The inf|ormation|
|00000a70| 20 67 69 76 65 6e 20 69 | 6e 20 74 68 65 20 64 6f | given i|n the do|
|00000a80| 63 75 6d 65 6e 74 61 74 | 69 6f 6e 0d 0a 61 62 6f |cumentat|ion..abo|
|00000a90| 75 74 20 74 68 65 6d 20 | 69 73 20 6d 6f 73 74 6c |ut them |is mostl|
|00000aa0| 79 20 63 6f 72 72 65 63 | 74 2c 20 77 69 74 68 20 |y correc|t, with |
|00000ab0| 61 20 73 69 6d 69 6c 61 | 72 20 6d 69 78 2d 75 70 |a simila|r mix-up|
|00000ac0| 20 69 6e 20 61 20 63 61 | 6c 63 75 6c 61 74 69 6f | in a ca|lculatio|
|00000ad0| 6e 0d 0a 6f 66 20 61 6e | 20 61 64 64 72 65 73 73 |n..of an| address|
|00000ae0| 20 6f 66 20 65 6e 74 72 | 79 20 74 6f 20 27 67 65 | of entr|y to 'ge|
|00000af0| 74 6c 69 6e 65 76 69 61 | 75 65 27 2c 20 6c 69 6b |tlinevia|ue', lik|
|00000b00| 65 20 74 68 65 20 6f 6e | 65 20 64 65 73 63 72 69 |e the on|e descri|
|00000b10| 62 65 64 20 61 62 6f 76 | 65 2e 0d 0a 41 6c 73 6f |bed abov|e...Also|
|00000b20| 2c 20 73 74 72 69 63 74 | 6c 79 20 73 70 65 61 6b |, strict|ly speak|
|00000b30| 69 6e 67 2c 20 27 67 65 | 74 6c 69 6e 65 76 61 6c |ing, 'ge|tlineval|
|00000b40| 75 65 27 20 64 6f 65 73 | 20 6e 6f 74 20 72 65 74 |ue' does| not ret|
|00000b50| 75 72 6e 20 61 6e 79 74 | 68 69 6e 67 2c 20 73 69 |urn anyt|hing, si|
|00000b60| 6e 63 65 0d 0a 69 74 20 | 69 73 20 64 65 63 6c 61 |nce..it |is decla|
|00000b70| 72 65 64 20 61 73 20 27 | 76 6f 69 64 27 2e 20 41 |red as '|void'. A|
|00000b80| 73 20 61 20 73 69 64 65 | 20 65 66 66 65 63 74 20 |s a side| effect |
|00000b90| 69 74 20 6d 6f 64 69 66 | 69 65 73 20 61 20 63 6f |it modif|ies a co|
|00000ba0| 6e 74 65 6e 74 73 20 6f | 66 0d 0a 61 20 75 73 65 |ntents o|f..a use|
|00000bb0| 72 20 73 75 70 70 6c 69 | 65 64 20 62 75 66 66 65 |r suppli|ed buffe|
|00000bc0| 72 2c 20 63 6f 70 79 69 | 6e 67 20 74 68 65 72 65 |r, copyi|ng there|
|00000bd0| 20 61 20 63 6f 6e 74 65 | 6e 74 73 20 6f 66 20 61 | a conte|nts of a|
|00000be0| 20 63 6f 6d 6d 61 6e 64 | 20 6c 69 6e 65 2e 20 49 | command| line. I|
|00000bf0| 74 0d 0a 77 6f 75 6c 64 | 20 62 65 20 70 72 6f 62 |t..would| be prob|
|00000c00| 61 62 6c 79 20 6d 6f 72 | 65 20 63 6f 6e 76 65 6e |ably mor|e conven|
|00000c10| 69 65 6e 74 20 69 66 2c | 20 69 6e 73 74 65 61 64 |ient if,| instead|
|00000c20| 20 6f 66 20 62 65 69 6e | 67 20 76 6f 69 64 2c 20 | of bein|g void, |
|00000c30| 69 74 20 77 6f 75 6c 64 | 20 72 65 74 75 72 6e 0d |it would| return.|
|00000c40| 0a 73 6f 6d 65 74 68 69 | 6e 67 20 75 73 65 66 75 |.somethi|ng usefu|
|00000c50| 6c 2c 20 73 61 79 20 61 | 20 6e 75 6d 62 65 72 20 |l, say a| number |
|00000c60| 6f 66 20 63 6f 70 69 65 | 64 20 63 68 61 72 61 63 |of copie|d charac|
|00000c70| 74 65 72 73 2c 20 62 75 | 74 20 69 74 20 64 6f 65 |ters, bu|t it doe|
|00000c80| 73 6e 27 74 2c 0d 0a 73 | 6f 20 77 65 20 6d 61 79 |sn't,..s|o we may|
|00000c90| 20 68 61 76 65 20 74 6f | 20 6c 69 76 65 20 77 69 | have to| live wi|
|00000ca0| 74 68 20 74 68 61 74 2e | 20 20 4a 75 73 74 20 74 |th that.| Just t|
|00000cb0| 6f 20 6d 61 6b 65 20 6f | 75 72 20 6c 69 66 65 20 |o make o|ur life |
|00000cc0| 6d 6f 72 65 0d 0a 69 6e | 74 65 72 65 73 74 69 6e |more..in|terestin|
|00000cd0| 67 2c 20 74 68 65 20 6f | 74 68 65 72 20 66 75 6e |g, the o|ther fun|
|00000ce0| 63 74 69 6f 6e 2c 20 27 | 63 61 6c 6c 67 75 6c 61 |ction, '|callgula|
|00000cf0| 6d 27 2c 20 72 65 74 75 | 72 6e 73 20 27 69 6e 74 |m', retu|rns 'int|
|00000d00| 27 20 2d 20 74 68 65 20 | 72 65 74 75 72 6e 0d 0a |' - the |return..|
|00000d10| 73 74 61 74 75 73 20 6f | 66 20 61 6e 20 65 78 65 |status o|f an exe|
|00000d20| 63 75 74 65 64 20 63 6f | 6d 6d 61 6e 64 2e 20 20 |cuted co|mmand. |
|00000d30| 54 68 69 73 20 6d 61 6b | 65 73 20 77 6f 6e 64 65 |This mak|es wonde|
|00000d40| 72 73 20 74 6f 20 74 79 | 70 65 73 20 6f 66 20 79 |rs to ty|pes of y|
|00000d50| 6f 75 72 0d 0a 70 6f 69 | 6e 74 65 72 73 2e 20 20 |our..poi|nters. |
|00000d60| 53 65 65 20 74 68 65 20 | 73 75 70 70 6c 69 65 64 |See the |supplied|
|00000d70| 20 70 72 6f 67 72 61 6d | 20 65 78 61 6d 70 6c 65 | program| example|
|00000d80| 20 66 6f 72 20 74 6f 20 | 73 65 65 20 68 6f 77 20 | for to |see how |
|00000d90| 74 6f 20 63 61 73 74 2e | 0d 0a 41 6c 6c 20 6f 66 |to cast.|..All of|
|00000da0| 20 74 68 69 73 20 74 6f | 20 65 6e 73 75 72 65 20 | this to| ensure |
|00000db0| 74 68 61 74 20 79 6f 75 | 72 20 43 2d 63 6f 6d 70 |that you|r C-comp|
|00000dc0| 69 6c 65 72 20 77 69 6c | 6c 20 6e 6f 74 20 67 65 |iler wil|l not ge|
|00000dd0| 74 20 74 6f 74 61 6c 6c | 79 20 6c 6f 73 74 2e 0d |t totall|y lost..|
|00000de0| 0a 49 66 20 79 6f 75 20 | 68 61 76 65 20 61 20 63 |.If you |have a c|
|00000df0| 6f 6d 70 69 6c 65 72 20 | 77 68 69 63 68 20 61 63 |ompiler |which ac|
|00000e00| 63 65 70 74 73 20 74 68 | 65 20 73 74 75 66 66 20 |cepts th|e stuff |
|00000e10| 69 6e 20 61 20 66 6f 72 | 6d 20 66 72 6f 6d 20 61 |in a for|m from a|
|00000e20| 6e 20 6f 72 69 67 69 6e | 61 6c 0d 0a 64 6f 63 73 |n origin|al..docs|
|00000e30| 20 2d 20 72 65 70 6c 61 | 63 65 20 79 6f 75 72 20 | - repla|ce your |
|00000e40| 63 6f 6d 70 69 6c 65 72 | 2e 20 46 61 73 74 21 0d |compiler|. Fast!.|
|00000e50| 0a 28 41 73 20 61 6e 20 | 61 73 69 64 65 20 2d 20 |.(As an |aside - |
|00000e60| 61 6c 6c 20 74 68 69 73 | 20 70 6f 69 6e 74 65 72 |all this| pointer|
|00000e70| 20 70 6c 61 79 20 77 6f | 75 6c 64 20 62 65 20 65 | play wo|uld be e|
|00000e80| 61 73 69 65 72 20 69 6e | 20 61 73 73 65 6d 62 6c |asier in| assembl|
|00000e90| 65 72 2c 20 0d 0a 69 66 | 20 79 6f 75 20 66 65 65 |er, ..if| you fee|
|00000ea0| 6c 20 73 6f 20 69 6e 63 | 6c 69 6e 65 64 29 2e 0d |l so inc|lined)..|
|00000eb0| 0a 0d 0a 20 20 57 68 69 | 6c 65 20 65 78 70 65 72 |... Whi|le exper|
|00000ec0| 69 6d 65 6e 74 69 6e 67 | 20 77 68 69 74 68 20 74 |imenting| whith t|
|00000ed0| 68 65 20 70 72 6f 67 72 | 61 6d 20 65 78 61 6d 70 |he progr|am examp|
|00000ee0| 6c 65 20 74 72 79 20 74 | 68 65 20 66 6f 6c 6c 6f |le try t|he follo|
|00000ef0| 77 69 6e 67 2e 0d 0a 43 | 61 6c 6c 20 27 75 65 27 |wing...C|all 'ue'|
|00000f00| 20 6f 6e 20 73 6f 6d 65 | 20 66 69 6c 65 2c 20 70 | on some| file, p|
|00000f10| 6f 73 69 74 69 6f 6e 20 | 63 75 72 73 6f 72 20 73 |osition |cursor s|
|00000f20| 6f 6d 65 77 68 65 72 20 | 64 6f 77 6e 20 74 68 65 |omewher |down the|
|00000f30| 20 74 65 78 74 20 61 6e | 64 0d 0a 73 74 6f 70 20 | text an|d..stop |
|00000f40| 65 64 69 74 6f 72 20 77 | 69 74 68 20 5e 5a 2e 20 |editor w|ith ^Z. |
|00000f50| 54 72 79 20 73 6f 6d 65 | 20 6f 74 68 65 72 20 63 |Try some| other c|
|00000f60| 6f 6d 6d 61 6e 64 73 20 | 61 6e 64 20 75 70 6f 6e |ommands |and upon|
|00000f70| 20 72 65 74 75 72 6e 20 | 74 6f 20 47 75 6c 61 6d | return |to Gulam|
|00000f80| 0d 0a 74 79 70 65 20 27 | 66 67 27 2e 20 20 52 65 |..type '|fg'. Re|
|00000f90| 70 65 61 74 20 65 78 70 | 65 72 69 6d 65 6e 74 20 |peat exp|eriment |
|00000fa0| 73 74 6f 70 70 69 6e 67 | 20 74 68 65 20 65 64 69 |stopping| the edi|
|00000fb0| 74 6f 72 20 69 6e 20 47 | 75 6c 61 6d 20 61 6e 64 |tor in G|ulam and|
|00000fc0| 20 74 79 70 69 6e 67 0d | 0a 27 66 67 27 20 66 72 | typing.|.'fg' fr|
|00000fd0| 6f 6d 20 74 68 65 20 64 | 65 6d 6f 20 70 72 6f 67 |om the d|emo prog|
|00000fe0| 72 61 6d 20 70 72 6f 6d | 70 74 2e 20 44 6f 6e 27 |ram prom|pt. Don'|
|00000ff0| 74 20 79 6f 75 20 74 68 | 69 6e 6b 20 74 68 61 74 |t you th|ink that|
|00001000| 20 74 68 69 73 20 69 73 | 20 61 20 6e 69 63 65 0d | this is| a nice.|
|00001010| 0a 77 61 79 20 74 6f 20 | 72 75 6e 20 65 64 69 74 |.way to |run edit|
|00001020| 6f 72 20 66 6f 72 20 79 | 6f 75 72 2c 20 73 61 79 |or for y|our, say|
|00001030| 2c 20 4c 69 73 70 20 69 | 6e 74 65 72 70 72 65 74 |, Lisp i|nterpret|
|00001040| 65 72 3f 0d 0a 0d 0a 20 | 20 53 6f 6d 65 20 74 68 |er?.... | Some th|
|00001050| 69 6e 67 73 20 61 72 65 | 20 73 74 69 6c 6c 20 6d |ings are| still m|
|00001060| 69 73 73 69 6e 67 2e 20 | 4f 6e 65 20 63 61 6e 6e |issing. |One cann|
|00001070| 6f 74 20 74 65 6c 6c 20 | 27 75 65 27 2c 20 6f 6e |ot tell |'ue', on|
|00001080| 20 61 20 63 6f 6d 6d 61 | 6e 64 0d 0a 6c 69 6e 65 | a comma|nd..line|
|00001090| 2c 20 74 6f 20 6c 6f 61 | 64 20 61 20 66 69 6c 65 |, to loa|d a file|
|000010a0| 20 61 6e 64 20 67 6f 20 | 74 6f 20 74 68 65 20 6c | and go |to the l|
|000010b0| 69 6e 65 20 32 34 37 2e | 20 20 4f 72 20 74 68 65 |ine 247.| Or the|
|000010c0| 72 65 20 69 73 20 61 20 | 77 61 79 20 61 6e 64 20 |re is a |way and |
|000010d0| 49 0d 0a 61 6d 20 73 69 | 6d 70 6c 79 20 6e 6f 74 |I..am si|mply not|
|000010e0| 20 61 77 61 72 65 20 6f | 66 20 69 74 3f 20 20 41 | aware o|f it? A|
|000010f0| 6e 64 20 49 20 6b 6e 6f | 77 20 6f 66 20 6e 6f 20 |nd I kno|w of no |
|00001100| 77 61 79 20 74 6f 20 67 | 72 61 62 20 61 20 72 65 |way to g|rab a re|
|00001110| 73 75 6c 74 20 6f 66 0d | 0a 61 20 63 6f 6d 6d 61 |sult of.|.a comma|
|00001120| 6e 64 2c 20 73 74 75 66 | 66 20 69 74 20 69 6e 74 |nd, stuf|f it int|
|00001130| 6f 20 61 20 76 61 72 69 | 61 62 6c 65 20 61 6e 64 |o a vari|able and|
|00001140| 20 75 73 65 20 69 74 20 | 66 6f 72 20 61 20 74 65 | use it |for a te|
|00001150| 73 74 20 6f 66 20 63 6f | 6e 64 69 74 69 6f 6e 61 |st of co|nditiona|
|00001160| 6c 0d 0a 73 63 72 69 70 | 74 20 65 78 65 63 75 74 |l..scrip|t execut|
|00001170| 69 6f 6e 2e 20 20 4f 68 | 20 77 65 6c 6c 2c 20 6d |ion. Oh| well, m|
|00001180| 61 79 62 65 20 69 6e 20 | 73 6f 6d 65 20 66 75 74 |aybe in |some fut|
|00001190| 75 72 65 20 72 65 6c 65 | 61 73 65 2e 2e 2e 0d 0a |ure rele|ase.....|
|000011a0| 0d 0a 20 20 54 77 6f 20 | 6f 74 68 65 72 2c 20 6e |.. Two |other, n|
|000011b0| 6f 6e 2d 69 6e 74 65 72 | 61 63 74 69 76 65 2c 20 |on-inter|active, |
|000011c0| 77 61 79 73 20 6f 66 20 | 63 61 6c 6c 69 6e 67 20 |ways of |calling |
|000011d0| 47 75 6c 61 6d 20 61 72 | 65 20 61 6c 73 6f 20 6d |Gulam ar|e also m|
|000011e0| 65 6e 74 69 6f 6e 65 64 | 0d 0a 69 6e 20 64 6f 63 |entioned|..in doc|
|000011f0| 73 2e 20 20 49 20 64 69 | 64 20 6e 6f 74 20 74 72 |s. I di|d not tr|
|00001200| 79 20 27 50 65 78 65 63 | 20 6d 65 74 68 6f 64 27 |y 'Pexec| method'|
|00001210| 2c 20 62 75 74 20 61 74 | 74 65 6d 70 74 73 20 74 |, but at|tempts t|
|00001220| 6f 20 65 78 65 63 75 74 | 65 20 0d 0a 67 75 6c 61 |o execut|e ..gula|
|00001230| 6d 20 61 73 20 61 20 70 | 72 6f 67 72 61 6d 20 77 |m as a p|rogram w|
|00001240| 69 74 68 20 61 72 67 75 | 6d 65 6e 74 73 2c 20 61 |ith argu|ments, a|
|00001250| 73 20 64 65 73 63 72 69 | 62 65 64 2c 20 70 72 6f |s descri|bed, pro|
|00001260| 64 75 63 65 64 20 6f 6e | 6c 79 0d 0a 6e 6f 6e 73 |duced on|ly..nons|
|00001270| 65 6e 73 69 63 61 6c 20 | 65 72 72 6f 72 20 6d 65 |ensical |error me|
|00001280| 73 73 61 67 65 73 20 61 | 62 6f 75 74 20 27 69 6e |ssages a|bout 'in|
|00001290| 76 61 6c 69 64 20 72 65 | 67 65 78 70 27 20 61 6e |valid re|gexp' an|
|000012a0| 64 20 65 72 72 6f 72 20 | 6e 75 6d 62 65 72 20 2d |d error |number -|
|000012b0| 33 33 2e 0d 0a 43 61 6e | 20 61 6e 79 62 6f 64 79 |33...Can| anybody|
|000012c0| 20 73 68 65 64 20 73 6f | 6d 65 20 6c 69 67 68 74 | shed so|me light|
|000012d0| 20 6f 6e 20 74 68 61 74 | 20 6d 61 74 74 65 72 3f | on that| matter?|
|000012e0| 0d 0a 0d 0a 0d 0a 20 20 | 20 4d 69 63 68 61 6c 20 |...... | Michal |
|000012f0| 4a 61 65 67 65 72 6d 61 | 6e 6e 0d 0a 20 20 20 4d |Jaegerma|nn.. M|
|00001300| 79 72 69 61 73 20 52 65 | 73 65 61 72 63 68 20 43 |yrias Re|search C|
|00001310| 6f 72 70 6f 72 61 74 69 | 6f 6e 0d 0a 20 20 20 45 |orporati|on.. E|
|00001320| 64 6d 6f 6e 74 6f 6e 2c | 20 41 6c 62 65 72 74 61 |dmonton,| Alberta|
|00001330| 2c 20 43 41 4e 41 44 41 | 0d 0a 20 20 20 2e 2e 2e |, CANADA|.. ...|
|00001340| 61 6c 62 65 72 74 61 21 | 6d 79 72 69 61 73 21 6d |alberta!|myrias!m|
|00001350| 6a 0d 0a 20 20 20 28 6f | 72 20 79 6f 75 20 6d 61 |j.. (o|r you ma|
|00001360| 79 20 74 72 79 20 6d 6a | 40 6d 79 72 69 61 73 2e |y try mj|@myrias.|
|00001370| 55 55 43 50 29 0d 0a 0d | 0a 2d 2d 2d 2d 2d 2d 2d |UUCP)...|.-------|
|00001380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013c0| 2d 2d 2d 2d 2d 2d 2d 0d | 0a 0d 0a 2f 2a 20 0d 0a |-------.|.../* ..|
|000013d0| 2a 20 41 20 64 65 6d 6f | 20 70 72 6f 67 72 61 6d |* A demo| program|
|000013e0| 20 74 6f 20 73 68 6f 77 | 20 61 20 75 73 61 67 65 | to show| a usage|
|000013f0| 20 6f 66 20 47 75 6c 61 | 6d 20 27 68 6f 6f 6b 73 | of Gula|m 'hooks|
|00001400| 27 20 2d 20 63 61 6c 6c | 20 66 72 6f 6d 0d 0a 2a |' - call| from..*|
|00001410| 20 47 75 6c 61 6d 20 73 | 68 65 6c 6c 21 20 20 57 | Gulam s|hell! W|
|00001420| 68 65 6e 20 61 73 6b 65 | 64 2c 20 74 72 79 20 64 |hen aske|d, try d|
|00001430| 69 66 66 65 72 65 6e 74 | 20 67 75 6c 61 6d 20 63 |ifferent| gulam c|
|00001440| 6f 6d 6d 61 6e 64 73 2c | 20 75 65 0d 0a 2a 20 69 |ommands,| ue..* i|
|00001450| 6e 20 70 61 72 74 69 63 | 75 6c 61 72 2e 0d 0a 2a |n partic|ular...*|
|00001460| 0d 0a 2a 20 41 20 6e 75 | 6d 62 65 72 73 20 6f 66 |..* A nu|mbers of|
|00001470| 20 70 6f 69 6e 74 65 72 | 73 20 66 6c 6f 61 74 69 | pointer|s floati|
|00001480| 6e 67 20 61 72 6f 75 6e | 64 20 69 73 20 61 20 6c |ng aroun|d is a l|
|00001490| 69 74 74 6c 65 20 62 69 | 74 20 68 69 67 68 65 72 |ittle bi|t higher|
|000014a0| 0d 0a 2a 20 74 68 61 6e | 20 6e 65 63 65 73 73 61 |..* than| necessa|
|000014b0| 72 79 2c 20 62 75 74 20 | 77 65 20 77 69 6c 6c 20 |ry, but |we will |
|000014c0| 77 61 69 73 74 65 20 73 | 6f 6d 65 20 6d 65 6d 6f |waiste s|ome memo|
|000014d0| 72 65 20 66 6f 72 20 74 | 68 65 20 73 61 6b 65 0d |re for t|he sake.|
|000014e0| 0a 2a 20 6f 66 20 63 6c | 61 72 69 74 79 2e 0d 0a |.* of cl|arity...|
|000014f0| 2a 0d 0a 2a 20 4d 69 63 | 68 61 6c 20 4a 61 65 67 |*..* Mic|hal Jaeg|
|00001500| 65 72 6d 61 6e 6e 2c 20 | 4f 63 74 6f 62 65 72 20 |ermann, |October |
|00001510| 31 39 38 38 0d 0a 2a 2f | 0d 0a 0d 0a 23 69 6e 63 |1988..*/|....#inc|
|00001520| 6c 75 64 65 20 3c 73 74 | 64 69 6f 2e 68 3e 0d 0a |lude <st|dio.h>..|
|00001530| 23 69 6e 63 6c 75 64 65 | 20 3c 6f 73 62 69 6e 64 |#include| <osbind|
|00001540| 2e 68 3e 0d 0a 23 69 6e | 63 6c 75 64 65 20 3c 73 |.h>..#in|clude <s|
|00001550| 74 72 69 6e 67 2e 68 3e | 0d 0a 23 64 65 66 69 6e |tring.h>|..#defin|
|00001560| 65 20 20 53 48 45 4c 4c | 50 20 20 20 20 20 20 20 |e SHELL|P |
|00001570| 20 20 28 28 63 68 61 72 | 20 2a 2a 29 20 30 78 30 | ((char| **) 0x0|
|00001580| 34 66 36 4c 29 0d 0a 23 | 64 65 66 69 6e 65 20 20 |4f6L)..#|define |
|00001590| 47 5f 4d 41 47 49 43 20 | 20 20 20 20 20 20 20 30 |G_MAGIC | 0|
|000015a0| 78 30 31 33 35 0d 0a 0d | 0a 6d 61 69 6e 28 29 0d |x0135...|.main().|
|000015b0| 0a 7b 0d 0a 20 20 20 20 | 20 20 20 6c 6f 6e 67 20 |.{.. | long |
|000015c0| 73 61 76 65 5f 73 73 70 | 3b 0d 0a 20 20 20 20 20 |save_ssp|;.. |
|000015d0| 20 20 73 68 6f 72 74 20 | 73 68 5f 6d 61 67 69 63 | short |sh_magic|
|000015e0| 3b 0d 0a 20 20 20 20 20 | 20 20 63 68 61 72 20 62 |;.. | char b|
|000015f0| 75 66 5b 32 35 38 5d 3b | 0d 0a 20 20 20 20 20 20 |uf[258];|.. |
|00001600| 20 63 68 61 72 20 2a 74 | 67 70 74 72 3b 20 20 20 | char *t|gptr; |
|00001610| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 73 74 6f 72 | | /* stor|
|00001620| 61 67 65 20 66 6f 72 20 | 74 6f 67 75 5f 20 20 20 |age for |togu_ |
|00001630| 20 20 20 20 20 20 2a 2f | 0d 0a 20 20 20 20 20 20 | */|.. |
|00001640| 20 2f 2a 20 69 66 20 79 | 6f 75 20 72 65 61 6c 6c | /* if y|ou reall|
|00001650| 79 20 77 6f 75 6c 64 20 | 6c 69 6b 65 20 74 6f 20 |y would |like to |
|00001660| 68 61 76 65 20 69 74 20 | 72 69 67 68 74 2c 20 74 |have it |right, t|
|00001670| 68 65 6e 20 20 20 2a 2f | 0d 0a 20 20 20 20 20 20 |hen */|.. |
|00001680| 20 2f 2a 20 74 67 70 74 | 72 20 73 68 6f 75 6c 64 | /* tgpt|r should|
|00001690| 20 62 65 20 61 20 70 6f | 69 6e 74 65 72 20 74 6f | be a po|inter to|
|000016a0| 20 76 6f 69 64 20 2d 20 | 09 09 20 20 20 20 2a 2f | void - |.. */|
|000016b0| 0d 0a 20 20 20 20 20 20 | 20 2f 2a 20 61 20 62 69 |.. | /* a bi|
|000016c0| 74 20 6f 66 20 6f 76 65 | 72 6b 69 6c 6c 20 6f 6e |t of ove|rkill on|
|000016d0| 20 53 54 20 3a 2d 29 09 | 09 09 20 20 20 20 2a 2f | ST :-).|.. */|
|000016e0| 0d 0a 20 20 20 20 20 20 | 20 0d 0a 20 20 20 20 20 |.. | .. |
|000016f0| 20 20 09 09 09 20 20 20 | 0d 0a 20 20 20 20 20 20 | ... |.. |
|00001700| 20 69 6e 74 20 20 28 2a | 20 63 67 70 29 28 29 3b | int (*| cgp)();|
|00001710| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 70 6f 69 6e | | /* poin|
|00001720| 74 65 72 20 74 6f 20 63 | 61 6c 6c 67 75 6c 61 6d |ter to c|allgulam|
|00001730| 28 29 20 20 20 20 2a 2f | 0d 0a 20 20 20 20 20 20 |() */|.. |
|00001740| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001750| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 61 6c 73 6f | | /* also|
|00001760| 20 63 6f 6e 74 61 69 6e | 73 20 74 6f 67 75 5f 2c | contain|s togu_,|
|00001770| 20 62 75 74 20 20 2a 2f | 0d 0a 20 20 20 20 20 20 | but */|.. |
|00001780| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001790| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 61 20 74 79 | | /* a ty|
|000017a0| 70 65 20 69 73 20 64 69 | 66 66 65 72 65 6e 74 20 |pe is di|fferent |
|000017b0| 20 20 20 20 20 20 2a 2f | 0d 0a 20 20 20 20 20 20 | */|.. |
|000017c0| 20 76 6f 69 64 20 28 2a | 20 67 6c 70 29 28 29 3b | void (*| glp)();|
|000017d0| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 70 6f 69 6e | | /* poin|
|000017e0| 74 65 72 20 74 6f 20 67 | 65 74 6c 69 6e 65 76 69 |ter to g|etlinevi|
|000017f0| 61 75 65 28 29 20 2a 2f | 0d 0a 0d 0a 20 20 20 20 |aue() */|.... |
|00001800| 20 20 20 66 70 72 69 6e | 74 66 28 73 74 64 65 72 | fprin|tf(stder|
|00001810| 72 2c 20 22 57 65 6c 63 | 6f 6d 65 20 74 6f 20 63 |r, "Welc|ome to c|
|00001820| 61 6c 6c 67 75 6c 61 6d | 20 64 65 6d 6f 2e 5c 6e |allgulam| demo.\n|
|00001830| 22 29 3b 0d 0a 20 20 20 | 20 20 20 20 73 61 76 65 |");.. | save|
|00001840| 5f 73 73 70 20 3d 20 53 | 75 70 65 72 28 30 4c 29 |_ssp = S|uper(0L)|
|00001850| 3b 0d 0a 20 20 20 20 20 | 20 20 74 67 70 74 72 20 |;.. | tgptr |
|00001860| 3d 20 2a 53 48 45 4c 4c | 50 3b 0d 0a 20 20 20 20 |= *SHELL|P;.. |
|00001870| 20 20 20 53 75 70 65 72 | 28 73 61 76 65 5f 73 73 | Super|(save_ss|
|00001880| 70 29 3b 0d 0a 0d 0a 20 | 20 20 20 20 20 20 69 66 |p);.... | if|
|00001890| 20 28 47 5f 4d 41 47 49 | 43 20 21 3d 20 28 73 68 | (G_MAGI|C != (sh|
|000018a0| 5f 6d 61 67 69 63 20 3d | 20 2a 28 28 73 68 6f 72 |_magic =| *((shor|
|000018b0| 74 20 2a 29 28 74 67 70 | 74 72 20 2d 20 38 29 29 |t *)(tgp|tr - 8))|
|000018c0| 29 29 20 7b 0d 0a 20 20 | 20 20 20 20 20 20 20 20 |)) {.. | |
|000018d0| 20 20 20 20 20 66 70 72 | 69 6e 74 66 20 28 73 74 | fpr|intf (st|
|000018e0| 64 65 72 72 2c 20 22 77 | 72 6f 6e 67 20 6d 61 67 |derr, "w|rong mag|
|000018f0| 69 63 20 76 61 6c 75 65 | 20 25 78 5c 6e 22 2c 20 |ic value| %x\n", |
|00001900| 73 68 5f 6d 61 67 69 63 | 29 3b 0d 0a 20 20 20 20 |sh_magic|);.. |
|00001910| 20 20 20 20 20 20 20 20 | 20 20 20 65 78 69 74 20 | | exit |
|00001920| 28 31 29 3b 0d 0a 20 20 | 20 20 20 20 20 7d 0d 0a |(1);.. | }..|
|00001930| 0d 0a 20 20 20 20 20 20 | 20 63 67 70 20 3d 20 2a |.. | cgp = *|
|00001940| 28 28 69 6e 74 20 28 2a | 29 28 29 29 20 74 67 70 |((int (*|)()) tgp|
|00001950| 74 72 29 3b 0d 0a 20 20 | 20 20 20 20 20 67 6c 70 |tr);.. | glp|
|00001960| 20 3d 20 2a 28 28 76 6f | 69 64 20 28 2a 29 28 29 | = *((vo|id (*)()|
|00001970| 29 20 28 74 67 70 74 72 | 20 2d 20 36 29 29 3b 0d |) (tgptr| - 6));.|
|00001980| 0a 20 20 20 20 20 20 20 | 28 2a 20 63 67 70 29 28 |. |(* cgp)(|
|00001990| 22 65 63 68 6f 20 27 74 | 65 73 74 20 6f 66 20 47 |"echo 't|est of G|
|000019a0| 75 6c 61 6d 27 22 29 3b | 0d 0a 20 20 20 20 20 20 |ulam'");|.. |
|000019b0| 20 28 2a 20 63 67 70 29 | 28 22 65 63 68 6f 20 27 | (* cgp)|("echo '|
|000019c0| 65 78 65 63 75 74 69 6e | 67 20 6c 73 20 2d 6c 27 |executin|g ls -l'|
|000019d0| 22 29 3b 0d 0a 20 20 20 | 20 20 20 20 28 2a 20 63 |");.. | (* c|
|000019e0| 67 70 29 28 22 6c 73 20 | 2d 6c 22 29 3b 0d 0a 20 |gp)("ls |-l");.. |
|000019f0| 20 20 20 20 20 20 28 2a | 20 63 67 70 29 28 22 65 | (*| cgp)("e|
|00001a00| 63 68 6f 20 27 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |cho '---|--------|
|00001a10| 2d 2d 2d 2d 2d 2d 27 22 | 29 3b 0d 0a 20 20 20 20 |------'"|);.. |
|00001a20| 20 20 20 28 2a 20 63 67 | 70 29 28 22 6c 73 20 2d | (* cg|p)("ls -|
|00001a30| 52 20 2d 74 20 61 3a 5c | 5c 20 22 29 3b 0d 0a 20 |R -t a:\|\ ");.. |
|00001a40| 20 20 20 20 20 20 28 2a | 20 63 67 70 29 28 22 65 | (*| cgp)("e|
|00001a50| 63 68 6f 20 27 20 27 22 | 29 3b 0d 0a 20 20 20 20 |cho ' '"|);.. |
|00001a60| 20 20 20 28 2a 20 63 67 | 70 29 28 22 65 63 68 6f | (* cg|p)("echo|
|00001a70| 20 27 20 27 22 29 3b 0d | 0a 20 20 20 20 20 20 20 | ' '");.|. |
|00001a80| 28 2a 20 63 67 70 29 28 | 22 73 65 74 20 74 6d 70 |(* cgp)(|"set tmp|
|00001a90| 5f 6f 6c 64 5f 70 72 6f | 6d 70 74 20 24 70 72 6f |_old_pro|mpt $pro|
|00001aa0| 6d 70 74 22 29 3b 0d 0a | 20 20 20 20 20 20 20 28 |mpt");..| (|
|00001ab0| 2a 20 63 67 70 29 28 22 | 73 65 74 20 70 72 6f 6d |* cgp)("|set prom|
|00001ac0| 70 74 20 27 41 74 20 79 | 6f 75 72 20 73 65 72 76 |pt 'At y|our serv|
|00001ad0| 69 63 65 2c 20 53 69 72 | 21 27 22 29 3b 0d 0a 20 |ice, Sir|!'");.. |
|00001ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2f 2a | | /*|
|00001af0| 20 63 68 61 6e 67 65 20 | 61 20 67 65 6e 64 65 72 | change |a gender|
|00001b00| 20 69 66 20 61 20 6e 65 | 65 64 20 77 69 6c 6c 20 | if a ne|ed will |
|00001b10| 61 72 69 73 65 20 2a 2f | 0d 0a 20 20 20 20 20 20 |arise */|.. |
|00001b20| 20 28 2a 20 63 67 70 29 | 28 22 65 63 68 6f 20 27 | (* cgp)|("echo '|
|00001b30| 41 77 61 69 74 69 6e 67 | 20 79 6f 75 72 20 63 6f |Awaiting| your co|
|00001b40| 6d 6d 61 6e 64 73 21 21 | 27 22 29 3b 0d 0a 20 20 |mmands!!|'");.. |
|00001b50| 20 20 20 20 20 2f 2a 20 | 74 68 65 20 66 6f 6c 6c | /* |the foll|
|00001b60| 6f 77 69 6e 67 20 6c 6f | 6f 70 20 77 69 6c 6c 20 |owing lo|op will |
|00001b70| 63 79 63 6c 65 20 75 6e | 74 69 6c 20 69 74 20 77 |cycle un|til it w|
|00001b80| 69 6c 6c 20 67 65 74 20 | 61 6e 20 65 6d 70 74 79 |ill get |an empty|
|00001b90| 20 6c 69 6e 65 20 2a 2f | 0d 0a 20 20 20 20 20 20 | line */|.. |
|00001ba0| 20 77 68 69 6c 65 20 28 | 28 2a 20 67 6c 70 29 28 | while (|(* glp)(|
|00001bb0| 62 75 66 29 2c 20 70 75 | 74 63 68 61 72 28 27 5c |buf), pu|tchar('\|
|00001bc0| 6e 27 29 2c 20 30 20 21 | 3d 20 73 74 72 6c 65 6e |n'), 0 !|= strlen|
|00001bd0| 28 62 75 66 29 29 20 7b | 0d 0a 20 20 20 20 20 20 |(buf)) {|.. |
|00001be0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001bf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c00| 20 2f 2a 20 74 68 65 20 | 6e 65 77 20 6c 69 6e 65 | /* the |new line|
|00001c10| 20 6e 6f 74 20 73 75 70 | 70 6c 69 65 64 20 2a 2f | not sup|plied */|
|00001c20| 0d 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00001c30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c40| 20 20 20 20 20 20 20 20 | 20 2f 2a 20 62 79 20 47 | | /* by G|
|00001c50| 75 6c 61 6d 20 2d 20 44 | 49 59 2c 20 6d 61 74 65 |ulam - D|IY, mate|
|00001c60| 20 20 20 20 20 20 20 2a | 2f 0d 0a 20 20 20 20 20 | *|/.. |
|00001c70| 20 20 20 20 20 20 20 20 | 20 20 28 2a 20 63 67 70 | | (* cgp|
|00001c80| 29 28 62 75 66 29 3b 0d | 0a 20 20 20 20 20 20 20 |)(buf);.|. |
|00001c90| 7d 0d 0a 20 20 20 20 20 | 20 20 28 2a 20 63 67 70 |}.. | (* cgp|
|00001ca0| 29 28 22 73 65 74 20 70 | 72 6f 6d 70 74 20 24 74 |)("set p|rompt $t|
|00001cb0| 6d 70 5f 6f 6c 64 5f 70 | 72 6f 6d 70 74 22 29 3b |mp_old_p|rompt");|
|00001cc0| 0d 0a 20 20 20 20 20 20 | 20 28 2a 20 63 67 70 29 |.. | (* cgp)|
|00001cd0| 28 22 75 6e 73 65 74 20 | 74 6d 70 5f 6f 6c 64 5f |("unset |tmp_old_|
|00001ce0| 70 72 6f 6d 70 74 22 29 | 3b 0d 0a 20 20 20 20 20 |prompt")|;.. |
|00001cf0| 20 20 66 70 72 69 6e 74 | 66 20 28 73 74 64 65 72 | fprint|f (stder|
|00001d00| 72 2c 22 5c 6e 4e 69 63 | 65 20 74 61 6c 6b 69 6e |r,"\nNic|e talkin|
|00001d10| 67 20 74 6f 20 79 6f 75 | 2c 20 73 65 65 20 79 6f |g to you|, see yo|
|00001d20| 75 20 6c 61 74 65 72 2e | 5c 6e 22 29 3b 0d 0a 20 |u later.|\n");.. |
|00001d30| 20 20 20 20 20 20 65 78 | 69 74 28 30 29 3b 0d 0a | ex|it(0);..|
|00001d40| 7d 0d 0a 2f 2a 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}../* --|--------|
|00001d50| 2d 2d 2d 2d 2d 2d 2d 2f | 20 74 68 61 74 20 69 73 |-------/| that is|
|00001d60| 20 61 6c 6c 20 66 6f 72 | 20 74 6f 64 61 79 20 2f | all for| today /|
|00001d70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001d80| 2d 2d 2d 2d 2d 20 2a 2f | 0d 0a 0d 0a 2d 2d 20 0d |----- */|....-- .|
|00001d90| 0a 09 4d 69 63 68 61 6c | 20 4a 61 65 67 65 72 6d |..Michal| Jaegerm|
|00001da0| 61 6e 6e 0d 0a 09 4d 79 | 72 69 61 73 20 52 65 73 |ann...My|rias Res|
|00001db0| 65 61 72 63 68 20 43 6f | 72 70 6f 72 61 74 69 6f |earch Co|rporatio|
|00001dc0| 6e 0d 0a 09 45 64 6d 6f | 6e 74 6f 6e 2c 20 41 6c |n...Edmo|nton, Al|
|00001dd0| 62 65 72 74 61 2c 20 43 | 41 4e 41 44 41 0d 0a 09 |berta, C|ANADA...|
|00001de0| 2e 2e 2e 7b 69 68 6e 70 | 34 2c 20 75 62 63 2d 76 |...{ihnp|4, ubc-v|
|00001df0| 69 73 69 6f 6e 7d 21 65 | 6c 62 65 72 74 61 21 6d |ision}!e|lberta!m|
|00001e00| 79 72 69 61 73 21 6d 6a | 0d 0a |yrias!mj|.. |
+--------+-------------------------+-------------------------+--------+--------+
